package Helpers::DBTest;

use DBIx::Abstract;


sub setup
{
	$conn = DBIx::Abstract->connect({
	driver=>'mysql',
    host=>'localhost',
    dbname=>'test',
    user=>'wae_user',
    password=>'--',
    });
	%dbx = ('test' => $conn);
	
	#test
	my $s = $dbx{'test'}->select({fields => "id, login", tables => "wae03_user"})->fetchrow_array; 
    print "test: " . $s . "\n";
}


1;